; Music of Shockway Rider (1986) (Faster Than Light) (Rob Hubbard)
; Ripped by Megachur the 01/11/2006

	write "SHOCKWAR.BIN"

music_date_rip	equ &01b6
music_adr	equ &0d6b
first_theme	equ 0
last_theme	equ 0

	read "music_header_v1_0.asm"

	jp l1e56	; init	&1e40
	jp l1efb	; play
	jp l1e4f	; stop
	jp l2927
	jp l297a
;
.stop_music
.l1e4f
;
	xor a
	ld (l230f),a
	jp l1f78
;
.init_music
.l1e56
;
	xor a
	ld (l230f),a
	ld b,#00
	ld hl,l2310
	ld ix,l1e9b
	ld c,#20
	ld a,#03
.l1e67
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	push hl
	ld (ix+#10),#01
	ld (ix+#00),b
	ld (ix+#1d),b
	ld (ix+#03),e
	ld (ix+#04),d
	ex de,hl
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld (ix+#05),#02
	ld (ix+#06),b
	pop hl
	ld (ix+#01),e
	ld (ix+#02),d
	add ix,bc
	dec a
	jr nz,l1e67
	inc a
	ld (l1fa0),a
	ld (l230f),a
	ret
.l1e9b
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#09
.l1ebb
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#12
.l1edb
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#24
;
.play_music
.l1efb
;
	ld a,(l230f)
	and a
	ret z
.l1f01 equ $ + 1
	ld a,#00
	ld (l1f4e),a
	ld hl,l1fa0
	dec (hl)
	jr nz,l1f26
	ld b,(hl)
	ld ix,l1e9b
	call l2075
	ld ix,l1ebb
	call l2075
	ld ix,l1edb
	call l2075
.l1f21
	ld hl,l1fa0
.l1f25 equ $ + 1
	ld (hl),#01
.l1f26
	ld ix,l1e9b
	call l2121
	ld (l2247),hl
	ld (l224f),a
	ld ix,l1ebb
	call l2121
	ld (l2249),hl
	ld (l2250),a
	ld ix,l1edb
	call l2121
	ld (l224b),hl
	ld (l2251),a
.l1f4e equ $ + 1
	ld a,#00
	ld (l224d),a
	ld hl,l2254
	ld d,#0d
.l1f57
	ld e,(hl)
	ld b,#f4
	out (c),d
	ld bc,#f600
	out (c),c
	ld a,#c0
	out (c),a
	out (c),c
	ld b,#f4
	out (c),e
	ld b,#f6
	add a
	out (c),a
	out (c),c
	dec hl
	dec d
	jp p,l1f57
	ret
.l1f78
	ld de,#0d00	; original is ld de,#d000 should be ld de,&0d00 !!!
.l1f7b
	call l1f85
	dec d
	jp p,l1f7b
	ld de,#073f
.l1f85
	ld b,#f4
	out (c),d
	ld bc,#f600
	out (c),c
	ld a,#c0
	out (c),a
	out (c),c
	ld b,#f4
	out (c),e
	ld b,#f6
	add a
	out (c),a
	out (c),c
	ret
.l1fa0
	db #00
;
.jumps_table
;
	db l2060-$	;#bf
	db l2049-$	;#a7
	db l204E-$	;#ab
	db l2054-$	;#b0
	db l2013-$	;#6e
	db l2043-$	;#9d
	db l203F-$	;#98
	db l1FBB-$	;#13
	db l2030-$	;#87
	db l2029-$	;#7f
	db l1FF8-$	;#4d
	db l1FE8-$	;#3c
	db l2008-$	;#5b
	db l205A-$	;#ac
	db l1FB3-$	;#04
	db l2063-$	;#b3
	db l2069-$	;#b8
	db l206F-$	;#bd
.l1fb3
	xor a
	ld (l230f),a
	pop hl
	jp l1f78
.l1fbb
	ld c,(ix+#05)
	ld b,(ix+#06)
	ld l,(ix+#03)
	ld h,(ix+#04)
	add hl,bc
	inc bc
	inc bc
	ld a,(hl)
	inc hl
	ld d,(hl)
	ld e,a
	or d
	jr nz,l1fdd
	ld l,(ix+#03)
	ld h,(ix+#04)
	ld bc,#0002
	ld e,(hl)
	inc hl
	ld d,(hl)
.l1fdd
	ld (ix+#05),c
	ld (ix+#06),b
	ld b,#00
	jp l2087
.l1fe8
	ld a,(ix+#1f)
	ld c,a
	and #07
	ld hl,l222c
	xor (hl)
	and c
	xor (hl)
	ld (hl),a
	jp l2087
.l1ff8
	ld a,(ix+#1f)
	ld c,a
	and #38
	ld hl,l222c
	xor (hl)
	and c
	xor (hl)
	ld (hl),a
	jp l2087
.l2008
	ld hl,l222c
	ld a,(ix+#1f)
	cpl
	and (hl)
	ld (hl),a
	jr l2087
.l2013
	ld a,(de)
	inc de
	ld (ix+#07),b
	ld (ix+#08),b
	ld (ix+#0d),a
	set 2,(ix+#00)
	ld a,(de)
	ld (ix+#0e),a
	inc de
	jr l2087
.l2029
	ld a,(de)
	inc de
	ld (l1f01),a
	jr l2087
.l2030
	ld a,(de)
	ld (ix+#1b),a
	inc de
	ld a,(de)
	ld (ix+#1a),a
	inc de
	ld (ix+#1c),a
	jr l2087
.l203f
	set 7,(ix+#00)
.l2043
	set 3,(ix+#00)
	jr l2087
.l2049
	ld (ix+#1d),b
	jr l2087
.l204e
	ld (ix+#1d),#40
	jr l2087
.l2054
	ld (ix+#1d),#c0
	jr l2087
.l205a
	set 1,(ix+#00)
	jr l2087
.l2060
	ld (ix+#13),b
.l2063
	res 5,(ix+#00)
	jr l20b4
.l2069
	set 4,(ix+#00)
	jr l2087
.l206f
	set 1,(ix+#1e)
	jr l2087
.l2075
	dec (ix+#10)
	jr nz,l20c1
	ld (ix+#00),b
	set 0,(ix+#1e)
	ld e,(ix+#01)
	ld d,(ix+#02)
.l2087
	ld a,(de)
	inc de
	and a
	jp m,l20d2
	ld (ix+#12),a
	bit 4,(ix+#00)
	jr nz,l20b4
	ld a,(ix+#19)
	ld (ix+#13),a
	set 5,(ix+#00)
	set 6,(ix+#00)
	res 4,(ix+#00)
	ld a,(ix+#14)
	ld (ix+#16),a
	ld a,(ix+#17)
	ld (ix+#18),a
.l20b4
	ld a,(ix+#11)
	ld (ix+#10),a
	ld (ix+#02),d
	ld (ix+#01),e
	ret
.l20c1
	ld a,(ix+#00)
	bit 3,a
	ret z
	rla
	jr nc,l20ce
	inc (ix+#12)
	ret
.l20ce
	dec (ix+#12)
	ret
.l20d2
	cp #b8
	jr c,l2119
	add #20
	jr c,l20fe
	add #10
	jr c,l2104
	add #10
	jr nc,l20f7
	ld c,a
	ld hl,l22fd
	add hl,bc
	ld c,(hl)
	add hl,bc
	ld (ix+#0b),l
	ld (ix+#09),l
	ld (ix+#0c),h
	ld (ix+#0a),h
	jr l2087
.l20f7
	add #09
	ld (l1f25),a
	jr l2087
.l20fe
	inc a
	ld (ix+#11),a
	jr l2087
.l2104
	ld (ix+#19),a
	ld a,(de)
	inc de
	ld (ix+#14),a
	ld a,(de)
	inc de
	ld (ix+#15),a
	ld a,(de)
	inc de
	ld (ix+#17),a
	jp l2087
.l2119
	ld hl,jumps_table-&80	;l1f21
	ld c,a
	add hl,bc
	ld c,(hl)
	add hl,bc
	jp (hl)
.l2121
	ld c,(ix+#00)
	bit 5,c
	jr z,l216c
	ld a,(ix+#16)
	sub #10
	jr nc,l2154
	bit 6,c
	jr z,l2159
	add (ix+#13)
	jr nc,l2139
	sbc a
.l2139
	add #10
	ld (ix+#13),a
	ld a,(ix+#18)
	sub #10
	jr nc,l214f
	res 6,c
	ld a,(ix+#15)
	ld (ix+#16),a
	jr l216c
.l214f
	ld (ix+#18),a
	jr l216c
.l2154
	ld (ix+#16),a
	jr l216c
.l2159
	cpl
	sub #0f
	add (ix+#13)
	jr c,l2162
	sub a
.l2162
	ld (ix+#13),a
	dec (ix+#18)
	jr nz,l216c
	res 5,c
.l216c
	ld a,(ix+#12)
	ld b,a
	ld l,(ix+#0b)
	ld h,(ix+#0c)
	ld a,(hl)
	cp #54
	jr c,l2182
	ld l,(ix+#09)
	ld h,(ix+#0a)
	ld a,(hl)
.l2182
	inc hl
	ld (ix+#0b),l
	ld (ix+#0c),h
	add b
	ld hl,l2255
	ld d,#00
	add a
	ld e,a
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld l,(ix+#1d)
	bit 6,l
	jr z,l21e4
	ld h,a
	ld b,(ix+#1a)
	sla b
	bit 7,l
	ld a,(ix+#1c)
	jr z,l21ad
	bit 0,c
	jr nz,l21cb
.l21ad
	bit 5,l
	jr nz,l21bd
	sub (ix+#1b)
	jr nc,l21c8
	set 5,(ix+#1d)
	sub a
	jr l21c8
.l21bd
	add (ix+#1b)
	cp b
	jr c,l21c8
	res 5,(ix+#1d)
	ld a,b
.l21c8
	ld (ix+#1c),a
.l21cb
	ex de,hl
	srl b
	sub b
	ld e,a
	ld a,d
	ld d,#00
	jr nc,l21d6
	dec d
.l21d6
	add #a0
	jr c,l21e2
.l21da
	sla e
	rl d
	add #18
	jr nc,l21da
.l21e2
	add hl,de
	ex de,hl
.l21e4
	ld a,c
	xor #01
	ld (ix+#00),a
	bit 2,c
	jr z,l220f
	ld b,(ix+#0e)
	djnz l220c
	ld c,(ix+#0d)
	bit 7,c
	jr z,l21fb
	dec b
.l21fb
	ld l,(ix+#07)
	ld h,(ix+#08)
	add hl,bc
	ld (ix+#07),l
	ld (ix+#08),h
	add hl,de
	ex de,hl
	jr l220f
.l220c
	ld (ix+#0e),b
.l220f
	bit 1,(ix+#1e)
	jr z,l2228
	bit 0,(ix+#1e)
	jr z,l2228
	res 0,(ix+#1e)
	ld a,#00
	ld (l1f4e),a
	ld a,#07
	jr l2239
.l2228
	cpl
	and #03
.l222c equ $ + 1
	ld a,#38
	jr nz,l2239
	ld a,(l1f01)
	xor #08
	ld (l1f4e),a
	ld a,#07
.l2239
	ld hl,l224e
	xor (hl)
	and (ix+#1f)
	xor (hl)
	ld (hl),a
	ex de,hl
	ld a,(ix+#13)
	ret
.l224e equ $ + 7
.l224d equ $ + 6
.l224b equ $ + 4
.l2249 equ $ + 2
.l2247
	db #00,#00,#00,#00,#00,#00,#00,#38
.l2254 equ $ + 5
.l2251 equ $ + 2
.l2250 equ $ + 1
.l224f
	db #0f,#0f,#0d,#00,#00,#00
.l2255
	dw #077c,#0708,#06b0,#0640
	dw #05ec,#0594,#0544,#04f8
	dw #04b0,#0470,#042c,#03f0
	dw #03be,#0384,#0358,#0320
	dw #02f6,#02ca,#02a2,#027c
	dw #0258,#0238,#0216,#01f8
	dw #01df,#01c2,#01ac,#0190
	dw #017b,#0165,#0151,#013e
	dw #012c,#011c,#010b,#00fc
	dw #00ef,#00e1,#00d6,#00c8
	dw #00bd,#00b2,#00a8,#009f
	dw #0096,#008e,#0085,#007e
	dw #0077,#0070,#006b,#0064
	dw #005e,#0059,#0054,#004f
	dw #004b,#0047,#0042,#003f
	dw #003b,#0038,#0035,#0032
	dw #002f,#002c,#002a,#0027
	dw #0025,#0023,#0021,#001f
	dw #001d,#001c,#001a,#0019
	dw #0017,#0016,#0015,#0013
	dw #0012,#0011,#0010,#000f
.l22fd
	db #04,#05,#08,#0b,#00,#87,#04,#07
	db #0c,#87,#07,#0c,#10,#87,#00,#04
	db #07,#87
.l230f
.music_end
	db #00
.l2310
	dw l2316,l237c,l244a
.l2316
	dw l24c2,l24dd,l24c2,l24ea
	dw l250b,l250b,l2518,l2914
	dw l2914,l2914,l252c,l2545
	dw l255f,l2570,l255f,l257f
	dw l2914,l2914,l2914,l2914
	dw l252c,l2914,l272f,l272f
	dw l272f,l272f,l2914,l26e3
	dw l26e3,l2705,l27a3,l27b6
	dw l27a3,l27ce,l281b,l2850
	dw l281b,l28c0,l28c0,l28d1
	dw l28c0,l28c0,l28d7,l28c0
	dw l28c0,l28d1,l28c0,l28c0
	dw l28d7,l2705
	dw &0000
.l237c
	dw l2610,l2610,l2610,l2610
	dw l2610,l2610,l2610,l2610
	dw l2635,l2635,l2635,l2635
	dw l2675,l2675,l2675,l2675
	dw l2610,l2610,l2610,l2610
	dw l2610,l2610,l2610,l2610
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2656
	dw l26ba,l26ba,l26ba,l26ba
	dw l26ba,l26ba,l26ba,l26ba
	dw l26ba,l26c7,l26c7,l26c7
	dw l26c7,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2691,l2691
	dw l2691,l2691,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2675,l2675
	dw l2675,l2675,l2691,l2691
	dw l2691,l2691,&0000
.l244a
	dw l2593,l2593,l2593,l2593
	dw l25ad,l25c0,l25c0,l25ca
	dw l25ca,l25d4,l25d4,l2593
	dw l2593,l2593,l2593,l25de
	dw l25de,l25ca,l25ca,l25ca
	dw l25f1,l25ca,l25ca,l25fb
	dw l2914,l2914,l2593,l2593
	dw l2593,l2745,l274f,l274f
	dw l274f,l274f,l2745,l2770
	dw l277a,l2784,l277a,l2770
	dw l277a,l2784,l277a,l278e
	dw l28df,l28df,l28f1,l28f1
	dw l2902,l2902,l28df,l28df
	dw l28f1,l28f1,l2902,l2902
	dw l2902,l2902,l278e,&0000
.l24c2
	db #bc,#8a,#df,#00,#31,#05,#88,#01
	db #01,#e3,#c0,#80,#83,#28,#e1,#2b
	db #e3,#2e,#e5,#32,#e3,#30,#e1,#2e
	db #e3,#2d,#87
.l24dd
	db #e5,#2e,#e3,#2d,#e1,#2b,#e3,#29
	db #e9,#28,#e7,#80,#87
.l24ea
	db #e5,#35,#e3,#34,#e1,#2e,#e3,#32
	db #e9,#30,#e3,#80,#e1,#30,#2e,#2d
	db #30,#e3,#80,#80,#33,#e1,#32,#e3
	db #30,#e1,#2e,#e3,#30,#e1,#2d,#30
	db #87
.l250b
	db #e3,#80,#eb,#33,#e1,#32,#e3,#30
	db #e1,#2e,#e7,#30,#87
.l2518
	db #e3,#80,#e1,#35,#33,#e3,#35,#e1
	db #33,#35,#e3,#39,#35,#e1,#33,#32
	db #2e,#f1,#30,#87
.l252c
	db #e3,#c1,#80,#24,#e1,#30,#e3,#33
	db #e1,#30,#ef,#80,#e1,#80,#e5,#24
	db #e3,#2e,#e1,#30,#30,#ef,#c0,#80
	db #87
.l2545
	db #e3,#c2,#80,#2b,#e1,#2e,#e3,#30
	db #e1,#2e,#ef,#80,#e1,#80,#e5,#2b
	db #e3,#c1,#35,#e1,#37,#37,#ef,#c0
	db #80,#87
.l255f
	db #e3,#80,#3a,#e1,#38,#37,#33,#e3
	db #35,#e5,#37,#e1,#1f,#20,#1f,#20
	db #87
.l2570
	db #e3,#1f,#3a,#e1,#38,#37,#33,#e9
	db #35,#e1,#1f,#20,#1f,#20,#87
.l257f
	db #e3,#80,#3a,#e1,#38,#37,#33,#f1
	db #37,#e1,#80,#1d,#1d,#1d,#e3,#1d
	db #e1,#1d,#1d,#87
.l2593
	db #8a,#df,#00,#81,#05,#c0,#e3,#91
	db #0c,#e1,#16,#15,#16,#e3,#18,#e3
	db #18,#e3,#18,#e1,#11,#13,#13,#16
	db #11,#87
.l25ad
	db #e3,#11,#e1,#1b,#1a,#1b,#e3,#1d
	db #e3,#1d,#e3,#1d,#e1,#16,#18,#18
	db #1b,#16,#87
.l25c0
	db #e1,#16,#16,#15,#16,#16,#16,#15
	db #16,#87
.l25ca
	db #e1,#0f,#0f,#0e,#0f,#0f,#0f,#0e
	db #0f,#87
.l25d4
	db #e1,#11,#11,#10,#11,#11,#11,#10
	db #11,#87
.l25de
	db #e3,#07,#e1,#11,#10,#11,#e3,#13
	db #e3,#13,#e3,#13,#e1,#0c,#0e,#0e
	db #11,#0c,#87
.l25f1
	db #e1,#0d,#0d,#0c,#0d,#0d,#0d,#0c
	db #0d,#87
.l25fb
	db #e1,#0f,#0f,#0e,#0f,#0f,#0f,#0f
	db #f1,#13,#e1,#80,#11,#11,#11,#e3
	db #11,#e1,#11,#11,#87
.l2610
	db #e1,#8b,#df,#00,#11,#10,#89,#1f
	db #8d,#00,#8a,#c1,#30,#8b,#89,#07
	db #8d,#00,#89,#1f,#8d,#00,#8a,#c1
	db #30,#8b,#89,#1f,#8d,#00,#89,#07
	db #8d,#00,#8d,#00,#87
.l2635
	db #e1,#8b,#89,#1f,#8d,#00,#8a,#c1
	db #33,#8b,#89,#07,#8d,#00,#89,#1f
	db #8d,#00,#8a,#c1,#35,#8b,#89,#1f
	db #8d,#00,#89,#07,#8d,#00,#8d,#00
	db #87
.l2656
	db #e3,#8b,#89,#1f,#80,#8d,#00,#8d
	db #00,#8d,#00,#e1,#8d,#00,#89,#07
	db #8d,#00,#8d,#00,#8d,#00,#e3,#8d
	db #00,#e1,#8d,#00,#8d,#00,#87
.l2675
	db #e1,#8b,#89,#1f,#8d,#00,#89,#07
	db #8d,#00,#8d,#00,#e1,#89,#1f,#8d
	db #00,#8d,#00,#8d,#00,#89,#07,#8d
	db #00,#8d,#00,#87
.l2691
	db #e3,#89,#07,#8d,#00,#e1,#89,#1f
	db #8d,#00,#e3,#89,#07,#8d,#00,#e1
	db #89,#1f,#8d,#00,#e5,#89,#07,#8d
	db #00,#e1,#8d,#00,#e3,#8d,#00,#e1
	db #8d,#00,#e3,#8d,#00,#e1,#8d,#00
	db #87
.l26ba
	db #8b,#89,#1f,#e3,#8d,#00,#8d,#00
	db #8d,#00,#8d,#00,#87
.l26c7
	db #e3,#8d,#00,#8d,#00,#89,#07,#e1
	db #8d,#00,#e3,#8d,#00,#8d,#00,#89
	db #1f,#e1,#8d,#00,#e3,#8d,#00,#8d
	db #00,#8d,#00,#87
.l26e3
	db #81,#e5,#c1,#38,#c2,#33,#e5,#c1
	db #38,#e5,#c2,#33,#e3,#c2,#31,#c1
	db #33,#e5,#c1,#36,#c2,#31,#e5,#c1
	db #36,#e5,#c2,#31,#e3,#c1,#33,#c2
	db #31,#87
.l2705
	db #df,#00,#31,#05,#81,#e5,#c1,#38
	db #c2,#36,#f3,#84,#01,#14,#c1,#3b
	db #e5,#3b,#c2,#36,#f3,#c3,#3d,#e5
	db #c1,#3b,#c2,#39,#f3,#84,#01,#14
	db #c1,#3e,#e5,#35,#c2,#30,#f3,#c3
	db #37,#87
.l272f
	db #81,#e7,#80,#e1,#c1,#30,#e3,#c2
	db #2e,#f1,#c1,#33,#e7,#80,#e1,#33
	db #e3,#2e,#f1,#30,#c1,#87
.l2745
	db #e1,#0c,#0c,#0b,#0c,#0c,#0c,#0b
	db #0c,#87
.l274f
	db #e3,#0c,#0c,#e1,#0c,#e3,#0a,#0f
	db #e1,#0f,#0e,#0f,#0f,#0f,#0e,#0f
	db #e3,#0f,#0f,#e1,#0f,#e3,#0a,#0c
	db #e1,#0c,#0b,#0c,#0c,#0c,#0b,#0c
	db #87
.l2770
	db #e1,#14,#14,#13,#14,#14,#14
	db #13,#14,#87
.l277a
	db #e1,#0f,#0f,#0e,#0f,#0f,#0f,#0e
	db #0f,#87
.l2784
	db #e1,#12,#12,#11,#12,#12,#12,#11
	db #12,#87
.l278e
	db #e5,#14,#12,#f3,#0b,#e5,#17,#12
	db #f3,#0d,#e5,#17,#15,#f3,#0e,#e5
	db #11,#0c,#f3,#13,#87
.l27a3
	db #c0,#de,#00,#f1,#01,#82,#e1,#84
	db #ff,#01,#32,#90,#34,#e0,#32,#34
	db #32,#2f,#87
.l27b6
	db #84,#ff,#05,#e1,#37,#34,#e0,#32
	db #31,#e1,#2f,#84,#ff,#04,#31,#90
	db #31,#e0,#2f,#e1,#2d,#e8,#2c,#87
.l27ce
	db #e1,#84,#ff,#05,#38,#90,#38,#32
	db #36,#e1,#84,#ff,#01,#32,#90,#34
	db #e0,#2f,#e1,#2d,#e8,#90,#2f,#e1
	db #31,#e9,#34,#e1,#84,#ff,#04,#36
	db #90,#37,#36,#e3,#34,#e1,#84,#ff
	db #01,#32,#e3,#90,#34,#e1,#84,#ff
	db #01,#32,#90,#34,#31,#e3,#34,#e1
	db #36,#e0,#37,#36,#e1,#34,#e0,#37
	db #36,#e1,#34,#84,#ff,#04,#37,#e9
	db #90,#39,#e3,#34,#87
.l281b
	db #e1,#84,#ff,#01,#2d,#e3,#90,#2f
	db #e1,#84,#ff,#04,#39,#e3,#90,#3b
	db #e1,#84,#ff,#04,#39,#f1,#90,#3b
	db #e1,#84,#ff,#05,#39,#39,#84,#ff
	db #05,#37,#37,#34,#2f,#36,#34,#84
	db #ff,#04,#32,#32,#2f,#84,#ff,#01
	db #2d,#e7,#90,#2f,#87
.l2850
	db #e1,#2b,#2c,#28,#26,#e0,#31,#32
	db #31,#2f,#e1,#39,#84,#ff,#05,#37
	db #90,#38,#34,#e1,#84,#ff,#01,#32
	db #90,#34,#3b,#e0,#39,#3b,#e1,#84
	db #ff,#06,#37,#34,#32,#e0,#31,#2f
	db #31,#2f,#2d,#2b,#e1,#2c,#ef,#34
	db #e0,#36,#37,#38,#34,#32,#2f,#e1
	db #84,#ff,#05,#30,#e3,#2d,#80,#e0
	db #34,#37,#e1,#39,#84,#ff,#04,#39
	db #90,#e3,#3b,#39,#e1,#37,#e3,#36
	db #e1,#84,#ff,#04,#37,#e3,#90,#39
	db #37,#e1,#36,#e3,#34,#e1,#84,#ff
	db #05,#36,#e3,#90,#37,#36,#e0,#34
	db #37,#36,#34,#34,#32,#31,#2d,#87
.l28c0
	db #e0,#84,#fe,#01,#2d,#e1,#90,#2f
	db #e0,#84,#fe,#01,#2d,#e1,#90,#2f
	db #87
.l28d1
	db #e0,#2d,#2a,#26,#27,#87
.l28d7
	db #e1,#84,#ff,#01,#32,#90,#33,#87
.l28df
	db #e1,#10,#10,#0f,#10,#10,#10,#0f
	db #10,#10,#10,#0f,#10,#10,#10,#0f
	db #10,#87
.l28f1
	db #15,#15,#14,#15,#15,#15,#14,#15
	db #15,#15,#14,#15,#15,#15,#14,#15
	db #87
.l2902
	db #17,#17,#16,#17,#17,#17,#16,#17
	db #17,#17,#16,#17,#17,#17,#16,#17
	db #87
	db #00
.l2914
	db #ef,#80,#87
	db #00
.l291e equ $ + 6
.l291b equ $ + 3
.l291a equ $ + 2
.l2918
	db #00,#00,#00,#00,#00,#00,#00,#00
.l2926 equ $ + 6
.l2921 equ $ + 1
.l2920
	db #00,#3f,#10,#00,#10,#00,#ff
.l2927
	ld hl,l2918
	ld (hl),#00
	ld hl,l2a20
	sla a
	add l
	ld l,a
	jr nc,l2936
	inc h
.l2936
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld b,#11
	ld hl,l2aa5
.l293e
	ld a,(de)
	ld (hl),a
	inc hl
	inc de
	djnz l293e
	ld a,(l2aa6)
	ld (l2ab6),a
	ld hl,(l2aa7)
	ld (l291a),hl
	ld de,(l2aa9)
	ld (l291e),de
	ld a,l
	ld (l2920),a
	ld a,(l2aac)
	ld (l2921),a
	ld a,(l2aab)
	ld (l2926),a
	ld a,(l2ab5)
	ld e,a
	ld d,#0d
	call l1f85
	ld hl,l2918
	inc (hl)
	ret
.l2976
	ld (l2918),a
	ret
.l297a
	ld a,(l2918)
	and a
	ret z
	call l2ab8
	ld a,(l2aa5)
	and a
	jr z,l2976
	dec a
	ld (l2aa5),a
	ld a,(l2ab6)
	and a
	jr nz,l29c1
	ld a,(l2ab3)
	and a
	ret z
	dec a
	ld (l2ab3),a
	ld a,(l2aa6)
	ld (l2ab6),a
	ld a,(l2ab4)
	and a
	jr z,l29aa
	ld a,(l2ad3)
.l29aa
	ld b,a
	ld a,(l2aa7)
	add b
	ld (l291a),a
	ld a,(l2aa8)
	add b
	and #0f
	ld (l291b),a
	ld hl,(l2aa9)
	ld (l291e),hl
.l29c1
	ld hl,l2ab6
	dec (hl)
	ld a,(l2ab1)
	and a
	jr z,l29e8
	jp p,l29db
	ld hl,(l291a)
	ld de,(l2aad)
	add hl,de
	ld (l291a),hl
	jr l29e8
.l29db
	ld hl,(l291a)
	ld de,(l2aad)
	and a
	sbc hl,de
	ld (l291a),hl
.l29e8
	ld a,(l2ab2)
	and a
	jr z,l2a0b
	jp p,l29fe
	ld hl,(l291e)
	ld de,(l2aaf)
	add hl,de
	ld (l291e),hl
	jr l2a0b
.l29fe
	ld hl,(l291e)
	ld de,(l2aaf)
	and a
	sbc hl,de
	ld (l291e),hl
.l2a0b
	ld a,(l291a)
	ld (l2920),a
	ld hl,l2926
	ld d,#0c
.l2a16
	ld e,(hl)
	call l1f85
	dec hl
	dec d
	jp p,l2a16
	ret
.l2a20
	dw l2a2e,l2a3f,l2a50,l2a61
	dw l2a72,l2a83,l2a94
l2a2e
	db #38,#39,#4d,#00,#3c,#00,#34,#3a
	db #06,#00,#08,#00,#ff,#ff,#01,#00
	db #00
l2a3f
	db #09,#05,#3d,#00,#67,#00,#24,#3a
	db #00,#00,#00,#00,#ff,#00,#00,#00
	db #00
l2a50
	db #40,#05,#20,#01,#25,#01,#14,#32
	db #35,#00,#36,#00,#ff,#ff,#00,#00
	db #00
l2a61
	db #20,#02,#95,#00,#3d,#01,#04,#32
	db #04,#00,#04,#00,#01,#ff,#00,#00
	db #00
l2a72
	db #30,#31,#00,#00,#34,#00,#12,#33
	db #00,#00,#01,#00,#ff,#01,#01,#00
	db #00
l2a83
	db #30,#31,#80,#04,#80,#04,#12,#3a
	db #09,#00,#09,#00,#01,#01,#01,#00
	db #00
l2a94
	db #26,#07,#9a,#03,#56,#01,#21,#32
	db #03,#99,#67,#00,#ff,#ff,#03,#01
	db #00
.l2aa5
	db #00
.l2aa6
	db #00
.l2aa7
	db #00
.l2aaf equ $ + 7
.l2aad equ $ + 5
.l2aac equ $ + 4
.l2aab equ $ + 3
.l2aa9 equ $ + 1
.l2aa8
	db #00,#00,#00,#00,#00,#00,#00,#00
.l2ab6 equ $ + 6
.l2ab5 equ $ + 5
.l2ab4 equ $ + 4
.l2ab3 equ $ + 3
.l2ab2 equ $ + 2
.l2ab1 equ $ + 1
	db #00,#00,#00,#00,#00,#00,#00,#00
.l2ab8
	ld a,(l2ad3)
	and #48
	adc #38
	sla a
	sla a
	ld hl,l2ad6
	rl (hl)
	dec hl
	rl (hl)
	dec hl
	rl (hl)
	dec hl
	rl (hl)
	ld a,(hl)
	ret
.l2ad6 equ $ + 3
.l2ad3
	db #ff,#80,#1b,#34

.game_name
	db "Shockway Rider",0
.game_year
	db "1986",0
.game_publisher
	db "Faster Than Light",0
.music_author
	db "Rob Hubbard",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
